/ NetNews Offline 2 / NetNews Offline Volume 2.iso / news / comp / lang / c-part2 / 11623

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 50 61 74 68 3a 20 74 72 | 61 6e 73 66 6f 72 6d 65 |Path: tr|ansforme|
|00000010| 72 2e 70 74 69 2d 75 73 | 2e 63 6f 6d 2e 21 6e 65 |r.pti-us|.com.!ne|
|00000020| 77 73 0a 46 72 6f 6d 3a | 20 57 61 6c 74 20 44 69 |ws.From:| Walt Di|
|00000030| 78 6f 6e 20 3c 77 76 2e | 64 69 78 6f 6e 40 70 74 |xon <wv.|dixon@pt|
|00000040| 69 2d 75 73 2e 63 6f 6d | 3e 0a 4e 65 77 73 67 72 |i-us.com|>.Newsgr|
|00000050| 6f 75 70 73 3a 20 63 6f | 6d 70 2e 6c 61 6e 67 2e |oups: co|mp.lang.|
|00000060| 63 0a 53 75 62 6a 65 63 | 74 3a 20 52 65 3a 20 48 |c.Subjec|t: Re: H|
|00000070| 65 6c 70 20 2d 20 73 6f | 72 74 69 6e 67 20 73 74 |elp - so|rting st|
|00000080| 72 69 6e 67 73 0a 44 61 | 74 65 3a 20 32 35 20 4d |rings.Da|te: 25 M|
|00000090| 61 72 20 31 39 39 36 20 | 31 33 3a 33 38 3a 32 36 |ar 1996 |13:38:26|
|000000a0| 20 47 4d 54 0a 4f 72 67 | 61 6e 69 7a 61 74 69 6f | GMT.Org|anizatio|
|000000b0| 6e 3a 20 50 6f 77 65 72 | 20 54 65 63 68 6e 6f 6c |n: Power| Technol|
|000000c0| 6f 67 69 65 73 20 49 6e | 63 2e 0a 4d 65 73 73 61 |ogies In|c..Messa|
|000000d0| 67 65 2d 49 44 3a 20 3c | 34 6a 36 37 6b 69 24 68 |ge-ID: <|4j67ki$h|
|000000e0| 76 72 40 74 72 61 6e 73 | 66 6f 72 6d 65 72 2e 70 |vr@trans|former.p|
|000000f0| 74 69 2d 75 73 2e 63 6f | 6d 3e 0a 52 65 66 65 72 |ti-us.co|m>.Refer|
|00000100| 65 6e 63 65 73 3a 20 3c | 34 6a 31 31 6e 65 24 6b |ences: <|4j11ne$k|
|00000110| 6a 39 24 31 40 6d 68 61 | 66 6e 2e 70 72 6f 64 75 |j9$1@mha|fn.produ|
|00000120| 63 74 69 6f 6e 2e 63 6f | 6d 70 75 73 65 72 76 65 |ction.co|mpuserve|
|00000130| 2e 63 6f 6d 3e 0a 4e 4e | 54 50 2d 50 6f 73 74 69 |.com>.NN|TP-Posti|
|00000140| 6e 67 2d 48 6f 73 74 3a | 20 76 69 72 67 69 6c 2e |ng-Host:| virgil.|
|00000150| 70 74 69 2d 75 73 2e 63 | 6f 6d 0a 4d 69 6d 65 2d |pti-us.c|om.Mime-|
|00000160| 56 65 72 73 69 6f 6e 3a | 20 31 2e 30 0a 43 6f 6e |Version:| 1.0.Con|
|00000170| 74 65 6e 74 2d 54 79 70 | 65 3a 20 6d 75 6c 74 69 |tent-Typ|e: multi|
|00000180| 70 61 72 74 2f 6d 69 78 | 65 64 3b 0a 09 62 6f 75 |part/mix|ed;..bou|
|00000190| 6e 64 61 72 79 3d 22 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ndary="-|--------|
|000001a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000001b0| 2d 2d 2d 2d 2d 2d 32 34 | 30 38 30 31 33 31 34 37 |------24|08013147|
|000001c0| 31 30 39 32 31 22 0a 58 | 2d 4d 61 69 6c 65 72 3a |10921".X|-Mailer:|
|000001d0| 20 4d 6f 7a 69 6c 6c 61 | 20 31 2e 31 4e 20 28 58 | Mozilla| 1.1N (X|
|000001e0| 31 31 3b 20 49 3b 20 53 | 75 6e 4f 53 20 35 2e 33 |11; I; S|unOS 5.3|
|000001f0| 20 73 75 6e 34 6d 29 0a | 54 6f 3a 20 37 35 35 37 | sun4m).|To: 7557|
|00000200| 30 2e 31 30 35 31 40 63 | 6f 6d 70 75 73 65 72 76 |0.1051@c|ompuserv|
|00000210| 65 2e 63 6f 6d 0a 58 2d | 55 52 4c 3a 20 66 69 6c |e.com.X-|URL: fil|
|00000220| 65 3a 2f 68 6f 6d 65 2f | 77 76 64 2f 74 65 73 74 |e:/home/|wvd/test|
|00000230| 2f 74 65 73 74 2f 78 78 | 0a 0a 54 68 69 73 20 69 |/test/xx|..This i|
|00000240| 73 20 61 20 6d 75 6c 74 | 69 2d 70 61 72 74 20 6d |s a mult|i-part m|
|00000250| 65 73 73 61 67 65 20 69 | 6e 20 4d 49 4d 45 20 66 |essage i|n MIME f|
|00000260| 6f 72 6d 61 74 2e 0a 0a | 2d 2d 2d 2d 2d 2d 2d 2d |ormat...|--------|
|00000270| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000280| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 32 34 30 38 30 31 33 |--------|-2408013|
|00000290| 31 34 37 31 30 39 32 31 | 0a 43 6f 6e 74 65 6e 74 |14710921|.Content|
|000002a0| 2d 54 72 61 6e 73 66 65 | 72 2d 45 6e 63 6f 64 69 |-Transfe|r-Encodi|
|000002b0| 6e 67 3a 20 37 62 69 74 | 0a 43 6f 6e 74 65 6e 74 |ng: 7bit|.Content|
|000002c0| 2d 54 79 70 65 3a 20 74 | 65 78 74 2f 70 6c 61 69 |-Type: t|ext/plai|
|000002d0| 6e 3b 20 63 68 61 72 73 | 65 74 3d 75 73 2d 61 73 |n; chars|et=us-as|
|000002e0| 63 69 69 0a 0a 57 68 79 | 20 6e 6f 74 20 75 73 65 |cii..Why| not use|
|000002f0| 20 74 68 65 20 62 75 69 | 6c 74 20 69 6e 20 71 75 | the bui|lt in qu|
|00000300| 69 63 6b 20 73 6f 72 74 | 20 72 6f 75 74 69 6e 65 |ick sort| routine|
|00000310| 73 2e 20 20 41 6c 6c 20 | 79 6f 75 20 6e 65 65 64 |s.  All |you need|
|00000320| 20 74 6f 20 64 6f 20 69 | 73 20 70 72 6f 76 69 64 | to do i|s provid|
|00000330| 65 0a 74 68 65 20 63 6f | 6d 70 61 69 72 73 6f 6e |e.the co|mpairson|
|00000340| 20 66 75 6e 63 74 69 6f | 6e 2e 20 20 42 65 6c 6f | functio|n.  Belo|
|00000350| 77 20 69 73 20 61 20 63 | 6f 6d 70 61 72 69 73 6f |w is a c|ompariso|
|00000360| 6e 20 66 75 6e 63 74 69 | 6f 6e 20 74 68 61 74 20 |n functi|on that |
|00000370| 77 69 6c 6c 20 61 6c 70 | 68 65 62 69 74 69 7a 65 |will alp|hebitize|
|00000380| 0a 61 6e 20 61 72 72 61 | 79 20 6f 66 20 73 74 72 |.an arra|y of str|
|00000390| 69 6e 67 73 20 69 6e 20 | 61 6c 70 68 61 62 65 74 |ings in |alphabet|
|000003a0| 69 63 61 6c 20 6f 72 64 | 65 72 2e 0a 0a 23 69 6e |ical ord|er...#in|
|000003b0| 63 6c 75 64 65 20 3c 73 | 74 64 6c 69 62 2e 68 3e |clude <s|tdlib.h>|
|000003c0| 0a 0a 73 74 61 74 69 63 | 20 69 6e 74 20 61 6c 70 |..static| int alp|
|000003d0| 68 61 62 65 74 69 7a 65 | 28 20 63 6f 6e 73 74 20 |habetize|( const |
|000003e0| 76 6f 69 64 2a 20 61 72 | 67 31 2c 20 63 6f 6e 73 |void* ar|g1, cons|
|000003f0| 74 20 76 6f 69 64 2a 20 | 61 72 67 32 20 29 0a 7b |t void* |arg2 ).{|
|00000400| 0a 20 20 20 20 72 65 74 | 75 72 6e 20 73 74 72 63 |.    ret|urn strc|
|00000410| 6d 70 28 2a 28 63 68 61 | 72 2a 2a 29 61 72 67 31 |mp(*(cha|r**)arg1|
|00000420| 2c 20 2a 28 63 68 61 72 | 2a 2a 29 61 72 67 32 29 |, *(char|**)arg2)|
|00000430| 29 3b 0a 7d 0a 0a 0a 79 | 6f 75 20 70 61 73 73 20 |);.}...y|ou pass |
|00000440| 61 20 70 6f 69 6e 74 65 | 72 20 74 6f 20 79 6f 75 |a pointe|r to you|
|00000450| 72 20 73 6f 72 74 69 6e | 67 20 66 75 6e 63 74 69 |r sortin|g functi|
|00000460| 6f 6e 20 74 6f 20 71 73 | 6f 72 74 2e 20 20 71 73 |on to qs|ort.  qs|
|00000470| 6f 72 74 20 77 69 6c 6c | 20 74 68 65 6e 0a 65 6e |ort will| then.en|
|00000480| 76 6f 6b 65 20 79 6f 75 | 72 20 66 75 6e 63 74 69 |voke you|r functi|
|00000490| 6f 6e 20 61 73 20 72 65 | 71 75 69 72 65 64 20 74 |on as re|quired t|
|000004a0| 6f 20 73 6f 72 74 20 74 | 68 65 20 61 72 72 61 79 |o sort t|he array|
|000004b0| 20 6f 66 20 73 74 72 69 | 6e 67 73 2e 0a 48 65 72 | of stri|ngs..Her|
|000004c0| 65 20 69 73 20 68 6f 77 | 20 79 6f 75 20 77 6f 75 |e is how| you wou|
|000004d0| 6c 64 20 65 6e 76 6f 6b | 65 20 74 68 65 20 72 6f |ld envok|e the ro|
|000004e0| 75 74 69 6e 65 2e 0a 0a | 71 73 6f 72 74 28 77 6f |utine...|qsort(wo|
|000004f0| 72 64 73 2c 6e 75 6d 5f | 65 6c 65 6d 65 6e 74 73 |rds,num_|elements|
|00000500| 2c 73 69 7a 65 6f 66 28 | 63 68 61 72 2a 29 2c 61 |,sizeof(|char*),a|
|00000510| 6c 70 68 61 62 65 74 69 | 7a 65 29 3b 0a 0a 77 6f |lphabeti|ze);..wo|
|00000520| 72 64 73 20 69 73 20 64 | 65 63 6c 61 72 65 64 20 |rds is d|eclared |
|00000530| 74 6f 20 62 65 20 61 20 | 63 68 61 72 2a 2a 2c 20 |to be a |char**, |
|00000540| 6e 75 6d 5f 65 6c 65 6d | 65 6e 74 73 20 69 73 20 |num_elem|ents is |
|00000550| 74 68 65 20 6e 75 6d 62 | 65 72 20 6f 66 20 73 74 |the numb|er of st|
|00000560| 72 69 6e 67 73 2c 0a 73 | 69 7a 65 6f 66 28 63 68 |rings,.s|izeof(ch|
|00000570| 61 72 2a 29 20 69 73 20 | 74 68 65 20 73 69 7a 65 |ar*) is |the size|
|00000580| 20 6f 66 20 65 61 63 68 | 20 65 6c 65 6d 65 6e 74 | of each| element|
|00000590| 20 69 6e 20 74 68 65 20 | 63 68 61 72 2a 20 61 72 | in the |char* ar|
|000005a0| 72 61 79 2c 20 61 6e 64 | 20 61 6c 70 68 61 62 65 |ray, and| alphabe|
|000005b0| 74 69 7a 65 0a 69 73 20 | 74 68 65 20 70 6f 69 6e |tize.is |the poin|
|000005c0| 74 65 72 20 74 6f 20 74 | 68 65 20 63 6f 6d 70 61 |ter to t|he compa|
|000005d0| 72 69 73 6f 6e 20 66 75 | 6e 63 69 74 6f 6e 2e 0a |rison fu|nciton..|
|000005e0| 0a 54 6f 20 72 65 76 65 | 72 73 65 20 73 6f 72 74 |.To reve|rse sort|
|000005f0| 20 61 6c 6c 20 79 6f 75 | 20 77 6f 75 6c 64 20 68 | all you| would h|
|00000600| 61 76 65 20 74 6f 20 64 | 6f 20 69 73 20 74 6f 20 |ave to d|o is to |
|00000610| 72 65 76 65 72 73 65 20 | 74 68 65 20 74 77 6f 20 |reverse |the two |
|00000620| 61 72 67 75 6d 65 6e 74 | 73 0a 74 6f 20 74 68 65 |argument|s.to the|
|00000630| 20 73 74 72 63 6d 70 20 | 66 75 6e 63 74 69 6f 6e | strcmp |function|
|00000640| 2e 0a 0a 49 20 68 61 76 | 65 20 61 74 74 61 63 68 |...I hav|e attach|
|00000650| 65 64 20 61 20 72 6f 75 | 74 69 6e 65 20 74 68 61 |ed a rou|tine tha|
|00000660| 74 20 72 65 61 64 73 20 | 69 6e 20 61 20 62 75 6e |t reads |in a bun|
|00000670| 63 68 20 6f 66 20 73 74 | 72 69 6e 67 73 2e 20 20 |ch of st|rings.  |
|00000680| 4f 6e 65 20 73 74 72 69 | 6e 67 0a 70 65 72 20 6c |One stri|ng.per l|
|00000690| 69 6e 65 2c 20 73 6f 72 | 74 73 20 74 68 65 6e 20 |ine, sor|ts then |
|000006a0| 61 6e 64 20 70 72 69 6e | 74 73 20 74 68 65 6d 20 |and prin|ts them |
|000006b0| 6f 75 74 2e 20 20 49 20 | 64 69 64 20 6e 6f 74 20 |out.  I |did not |
|000006c0| 63 6c 65 61 6e 20 75 70 | 0a 74 68 65 20 6d 65 6d |clean up|.the mem|
|000006d0| 6f 72 79 20 74 68 61 74 | 20 77 61 73 20 61 6c 6c |ory that| was all|
|000006e0| 6f 63 61 74 65 64 2e 20 | 20 49 74 20 69 73 20 6f |ocated. | It is o|
|000006f0| 6e 6c 79 20 61 6e 20 65 | 78 61 6d 70 6c 65 2e 0a |nly an e|xample..|
|00000700| 0a 77 61 6c 74 0a 0a 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.walt..-|--------|
|00000710| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000720| 2d 2d 2d 2d 2d 2d 2d 2d | 32 34 30 38 30 31 33 31 |--------|24080131|
|00000730| 34 37 31 30 39 32 31 0a | 43 6f 6e 74 65 6e 74 2d |4710921.|Content-|
|00000740| 54 72 61 6e 73 66 65 72 | 2d 45 6e 63 6f 64 69 6e |Transfer|-Encodin|
|00000750| 67 3a 20 37 62 69 74 0a | 43 6f 6e 74 65 6e 74 2d |g: 7bit.|Content-|
|00000760| 54 79 70 65 3a 20 74 65 | 78 74 2f 70 6c 61 69 6e |Type: te|xt/plain|
|00000770| 0a 0a 23 69 6e 63 6c 75 | 64 65 20 3c 73 74 64 6c |..#inclu|de <stdl|
|00000780| 69 62 2e 68 3e 0a 23 69 | 6e 63 6c 75 64 65 20 3c |ib.h>.#i|nclude <|
|00000790| 73 74 64 69 6f 2e 68 3e | 0a 23 69 6e 63 6c 75 64 |stdio.h>|.#includ|
|000007a0| 65 20 3c 73 74 72 69 6e | 67 2e 68 3e 0a 0a 69 6e |e <strin|g.h>..in|
|000007b0| 74 20 63 6f 6d 70 61 72 | 65 28 63 6f 6e 73 74 20 |t compar|e(const |
|000007c0| 76 6f 69 64 2a 20 61 2c | 20 63 6f 6e 73 74 20 76 |void* a,| const v|
|000007d0| 6f 69 64 2a 20 62 29 0a | 7b 0a 20 20 20 20 72 65 |oid* b).|{.    re|
|000007e0| 74 75 72 6e 28 73 74 72 | 63 6d 70 28 2a 28 63 68 |turn(str|cmp(*(ch|
|000007f0| 61 72 2a 2a 29 62 2c 2a | 28 63 68 61 72 2a 2a 29 |ar**)b,*|(char**)|
|00000800| 61 29 29 3b 0a 7d 0a 0a | 76 6f 69 64 20 6d 61 69 |a));.}..|void mai|
|00000810| 6e 28 69 6e 74 20 61 72 | 67 63 2c 20 63 68 61 72 |n(int ar|gc, char|
|00000820| 2a 2a 20 61 72 67 76 29 | 0a 7b 0a 20 20 20 20 46 |** argv)|.{.    F|
|00000830| 49 4c 45 2a 20 66 68 3b | 0a 20 20 20 20 63 68 61 |ILE* fh;|.    cha|
|00000840| 72 2a 2a 20 77 6f 72 64 | 73 3b 0a 20 20 20 20 63 |r** word|s;.    c|
|00000850| 68 61 72 20 62 75 66 66 | 65 72 5b 31 33 32 5d 3b |har buff|er[132];|
|00000860| 0a 20 20 20 20 69 6e 74 | 20 69 2c 69 69 3b 0a 0a |.    int| i,ii;..|
|00000870| 20 20 20 20 69 66 28 61 | 72 67 63 20 21 3d 20 32 |    if(a|rgc != 2|
|00000880| 29 0a 20 20 20 20 7b 0a | 20 20 20 20 20 20 20 20 |).    {.|        |
|00000890| 70 72 69 6e 74 66 28 22 | 4e 6f 20 66 69 6c 65 20 |printf("|No file |
|000008a0| 73 70 65 63 69 66 69 65 | 64 2e 5c 6e 22 29 3b 0a |specifie|d.\n");.|
|000008b0| 20 20 20 20 20 20 20 20 | 65 78 69 74 28 31 29 3b |        |exit(1);|
|000008c0| 0a 20 20 20 20 7d 0a 20 | 20 20 20 66 68 20 3d 20 |.    }. |   fh = |
|000008d0| 66 6f 70 65 6e 28 61 72 | 67 76 5b 31 5d 2c 22 72 |fopen(ar|gv[1],"r|
|000008e0| 22 29 3b 0a 20 20 20 20 | 69 66 28 66 68 29 0a 20 |");.    |if(fh). |
|000008f0| 20 20 20 7b 0a 20 20 20 | 20 20 20 20 20 77 6f 72 |   {.   |     wor|
|00000900| 64 73 20 3d 20 28 63 68 | 61 72 2a 2a 29 20 6d 61 |ds = (ch|ar**) ma|
|00000910| 6c 6c 6f 63 28 35 30 30 | 20 2a 20 73 69 7a 65 6f |lloc(500| * sizeo|
|00000920| 66 28 63 68 61 72 2a 29 | 29 3b 0a 20 20 20 20 20 |f(char*)|);.     |
|00000930| 20 20 20 69 20 3d 20 30 | 3b 0a 20 20 20 20 20 20 |   i = 0|;.      |
|00000940| 20 20 77 68 69 6c 65 28 | 66 73 63 61 6e 66 28 66 |  while(|fscanf(f|
|00000950| 68 2c 22 25 73 20 5c 6e | 22 2c 62 75 66 66 65 72 |h,"%s \n|",buffer|
|00000960| 29 3d 3d 31 29 0a 20 20 | 20 20 20 20 20 20 7b 0a |)==1).  |      {.|
|00000970| 20 20 20 20 20 20 20 20 | 20 20 20 20 77 6f 72 64 |        |    word|
|00000980| 73 5b 69 2b 2b 5d 20 3d | 20 73 74 72 64 75 70 28 |s[i++] =| strdup(|
|00000990| 62 75 66 66 65 72 29 3b | 20 0a 20 20 20 20 20 20 |buffer);| .      |
|000009a0| 20 20 7d 0a 20 20 20 20 | 20 20 20 20 70 72 69 6e |  }.    |    prin|
|000009b0| 74 66 28 22 72 65 61 64 | 20 25 64 20 77 6f 72 64 |tf("read| %d word|
|000009c0| 73 5c 6e 22 2c 69 29 3b | 0a 20 20 20 20 20 20 20 |s\n",i);|.       |
|000009d0| 20 71 73 6f 72 74 28 77 | 6f 72 64 73 2c 69 2c 73 | qsort(w|ords,i,s|
|000009e0| 69 7a 65 6f 66 28 63 68 | 61 72 2a 29 2c 63 6f 6d |izeof(ch|ar*),com|
|000009f0| 70 61 72 65 29 3b 0a 20 | 20 20 20 20 20 20 20 66 |pare);. |       f|
|00000a00| 6f 72 28 69 69 3d 30 3b | 20 69 69 20 3c 20 69 3b |or(ii=0;| ii < i;|
|00000a10| 20 69 69 2b 2b 29 0a 20 | 20 20 20 20 20 20 20 7b | ii++). |       {|
|00000a20| 0a 20 20 20 20 20 20 20 | 20 20 20 20 20 70 72 69 |.       |     pri|
|00000a30| 6e 74 66 28 22 25 73 5c | 6e 22 2c 77 6f 72 64 73 |ntf("%s\|n",words|
|00000a40| 5b 69 69 5d 29 3b 0a 20 | 20 20 20 20 20 20 20 7d |[ii]);. |       }|
|00000a50| 0a 20 20 20 20 20 20 20 | 20 66 63 6c 6f 73 65 28 |.       | fclose(|
|00000a60| 66 68 29 3b 0a 20 20 20 | 20 7d 0a 20 20 20 20 65 |fh);.   | }.    e|
|00000a70| 6c 73 65 0a 20 20 20 20 | 7b 0a 20 20 20 20 20 20 |lse.    |{.      |
|00000a80| 20 20 70 72 69 6e 74 66 | 28 22 55 6e 61 62 6c 65 |  printf|("Unable|
|00000a90| 20 74 6f 20 6f 70 65 6e | 20 25 73 5c 6e 22 2c 61 | to open| %s\n",a|
|00000aa0| 72 67 76 5b 31 5d 29 3b | 0a 20 20 20 20 7d 0a 7d |rgv[1]);|.    }.}|
|00000ab0| 0a 0a 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..------|--------|
|00000ac0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ad0| 2d 2d 2d 32 34 30 38 30 | 31 33 31 34 37 31 30 39 |---24080|13147109|
|00000ae0| 32 31 2d 2d 0a          |                         |21--.   |        |
+--------+-------------------------+-------------------------+--------+--------+